home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 2
/
Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso
/
Aminet
/
comm
/
term
/
term34dRexx.lha
/
Autologin.term
next >
Wrap
Text File
|
1993-02-02
|
2KB
|
82 lines
/** $VER: Autologin.term 1.1 (2.2.93)
**
** Führt einen Auto-Login in eine Mailbox durch.
**
** Geschrieben von Olaf `Olsen' Barthel
**
** Um dieses Programm zu verwenden, sollte man das
** Telefonbuch öffnen, den Telefonbucheintrag anwählen,
** der dieses Programm benutzen soll, den Einstellungen
** `Commands...' öffnen und unter `Startup-/Login macro'
** eintippen:
**
** \a Autologin <Namenstext>,<Kennworttext>
**
** Bitte nicht die in eckigen Klammern eingeschlossenen
** Worte mit eingeben, stattdessen sollten an dieser Stelle
** die Texte eingegeben werden, die die Gegenstelle schickt,
** wenn der Anwender ihren/seinen Namen und ihr/sein Kennwort
** eingeben soll. Schickt die Mailbox beim Login den Text
** `Username:', wenn der Name des Anwenders einzugeben ist
** und `Passwort:', wenn das Benutzerkennwort einzugeben ist,
** würde man folgende Zeile eingeben:
**
** \a Autologin Username:,Passwort:
**
** Die Zeile bitte exakt wie oben beschrieben eintippen, das
** Komma darf nicht weggelassen werden!
**
** Nun bitte die `User/Password...' Einstellungen ändern,
** sodaß der zu verwendende Benutzername und das Benutzer-
** kennwort korrekt eingetragen sind.
**
** Jetzt die Telefonbuchdatei abspeichern und diese Datei
** in die Schublade "REXX:" kopieren.
**/
/* Die Wartezeit auf zehn Sekunden setzen. */
TIMEOUT 10
/* Die beiden Parameter einlesen. */
PARSE ARG userprompt ',' passwordprompt
/* Auf die Frage nach dem Benutzernamen warten. */
WAIT userprompt
/* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
IF rc ~= 0 THEN EXIT
/* Eine Sekunde warten... */
DELAY 1
/* Den Benutzernamen abschicken, einen Zeilenrücklauf
* hinzugeben.
*/
SEND '\u\r'
/* Auf die Frage nach dem Benutzerkennwort warten. */
WAIT passwordprompt
/* Ist der Text angekommen? Wenn nicht, sofort abbrechen. */
IF rc ~= 0 THEN EXIT
/* Eine Sekunde warten... */
DELAY 1
/* Das Benutzerkennwort abschicken, einen Zeilenrücklauf
* hinzugeben.
*/
SEND '\p\r'
/* Das war alles! */